# (decoded with TMPL 11972) if PtInRect (where, %HandleName%^^.viewRect) then begin if text <> nil then begin TEDeactivate (text); end; text := %HandleName%; TEActivate (text); TEClick (where, false, text); end;